home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Day Cry
/
Day Cry CD.bin
/
oh_towns
/
install
/
debug.c
< prev
next >
Wrap
Text File
|
1994-09-20
|
14KB
|
506 lines
/*************************************************************************
* DEBUG MODULE
*************************************************************************/
/*************************************************************************
* âfâoâbâOùpâüâjâàü[é╠É▌ÆΦ
*************************************************************************/
int set_debug_menu(char *mnu)
{
MNU_datAdd( mnu, 0, 'A', Rom16x16, 0, "selbox_test" , 0, "Select box test" );
MNU_datAdd( mnu, 0, 'P', Rom16x16, 0, "testdisp_test" , 0, "Text print test" );
MNU_datAdd( mnu, 0, 'C', Rom16x16, 0, "filecopy_test" , 0, "File copy test" );
MNU_datAdd( mnu, 0, 'R', Rom16x16, 0, "redsp_test" , 0, "Desktop redisp" );
MNU_datAdd( mnu, 0, 'S', Rom16x16, 0, "gets_test" , 0, "Gets test" );
MNU_datAdd( mnu, 0, 'D', Rom16x16, 0, "dirset_test" , 0, "Set dir. test" );
MNU_datAdd( mnu, 0, 'C', Rom16x16, 0, "callexp_test" , 0, "Call exp test" );
MNU_datAdd( mnu, 0, 'L', Rom16x16, 0, "lhaext_test" , 0, "LHA extract" );
MNU_datAdd( mnu, 0, 'I', Rom16x16, 0, "install_install", 0, "Install test" );
MNU_datAdd( mnu, 0, 'T', Rom16x16, 0, "tifload_test" , 0, "Tiff load test" );
return (0);
}
/*************************************************************************
* âRâ}âôâhæIæ≡â_âCâAâìâOé╠âeâXâg
*************************************************************************/
int selbox_test(int evno, char *evtdat)
{
char *dlgTxm;
int colbox;
colbox = 0;
colbox = SCN_tile_newMixCol(colbox,0x00,C_HGREEN,C_WHITE);
dlgTxm = DlgTxm_open(colbox);
DlgTxm_setTitle(dlgTxm,Fnt16x16,"TEST TITLE");
DlgTxm_putf( dlgTxm, Fnt16x16, 1, "TEST MESSAGE" );
DlgTxm_setBtn( dlgTxm, Fnt16x16, 64, 20, 8+1, 14, 15, 8, 0x0D, 0xFF00, 0, "redsp_test", 0, "EXEC");
DlgTxm_setBtn( dlgTxm, Fnt16x16, 64, 20, 8+1, 14, 15, 8, 0x1B, 0xFF00, 0, "", 0, "CANCEL");
DlgTxm_setSize(dlgTxm,320,40);
DlgTxm_setPosition(dlgTxm,DLGPOS_CENTER_OF_SCREEN);
DlgTxm_start(dlgTxm);
DlgTxm_close(dlgTxm);
SCN_tile_free(colbox);
return (0);
}
/*************************************************************************
* âeâLâXâgò\ĪâeâXâg
*************************************************************************/
int testdisp_test(int evno, char *evtdat)
{
char *fdl;
int ret;
char fn[256];
fn[0] = '\0';
if ( (fdl = FDL_open()) != 0 )
{
FDL_setTitle(fdl,"TEXT PRINT TEST");
FDL_setAtt(fdl,1);
FDL_setWild(fdl,"*.*");
FDL_setFn(fdl,"");
if ( FDL_start(fdl) == 0 )
{
strcpy(fn,FDL_getFn(fdl));
}
FDL_close(fdl);
}
if ( fn[0] )
{
APL_textView(Fnt16x16,480,400,18,fn,"TEXT VIEW");
}
return (0);
}
/*************************************************************************
* âtâ@âCâïòíÄ╩âeâXâg
*************************************************************************/
int filecopy_test(int evno, char *evtdat)
{
char *fdl;
unsigned att;
int ret;
char dirSrc[256], pathDst[256];
if ( (fdl = FDL_open()) == NULL )
return (-1);
FDL_setTitle(fdl,"COPY SOURCE DIRECTORY");
FDL_setAtt(fdl,FDLATT_SINGLE);
FDL_setWild(fdl,"*.*");
FDL_setFn(fdl,"");
ret = FDL_start(fdl);
if ( ret < 0 )
{
FDL_close(fdl);
return (0);
}
strcpy( dirSrc, FDL_getDir(fdl));
FDL_setTitle(fdl,"COPY DESTINATION DIRECTORY");
FDL_setAtt(fdl,FDLATT_SINGLE);
FDL_setWild(fdl,"*.*");
FDL_setFn(fdl,"");
ret = FDL_start(fdl);
if ( ret < 0 )
{
FDL_close(fdl);
return (0);
}
strcpy( pathDst, FDL_getDir(fdl));
att = FCOPY_ATT_SUBDIR | FCOPY_ATT_TIMESTAMP | FCOPY_ATT_CHK_OVERWRITE;
FCOPY_exec(att, dirSrc,"*.*",pathDst);
return (0);
}
/*************************************************************************
* ëµû╩ì─ò`ëµâeâXâg
*************************************************************************/
int redsp_test()
{
MOS_DEC();
SCN_wrtPage(1);
SCN_boxf(0,20,639,479-16,0,C_MBLACK);
APL_desktop_redsp();
MOS_INC();
}
/*************************************************************************
* ò╢ÄÜù±ôⁿù═âeâXâg
*************************************************************************/
int gets_test()
{
char *dlgGets;
char buf[256];
SCN_wrtPage(1);
dlgGets = DlgGets_open();
DlgGets_setTitle(dlgGets,Fnt16x16,"GEST TEST");
strcpy(buf,"TEST STRINGS");
DlgGets_setSize(dlgGets,320,64);
DlgGets_putf( dlgGets, Fnt16x16, 1, "TEST MESSAGE" );
DlgGets_setPosition(dlgGets,DLGPOS_CENTER_OF_SCREEN); /* ëµû╩Æåë¢ */
DlgGets_start(dlgGets,255,buf);
DlgGets_close(dlgGets);
}
/*************************************************************************
* âCâôâXâgü[âïâfâBâîâNâgâèÉ▌ÆΦâeâXâg
*************************************************************************/
int dirset_test()
{
char dir[128];
strcpy(dir,"H:/TEST");
APL_setInstallDir(dir,"TEST TITLE");
return (0);
}
/*************************************************************************
* âlâCâeâBâuâéü[âhÄqâvâìâZâXâvâìâOâëâÇé╠ïNô«âeâXâg
*************************************************************************/
int callexp_test()
{
#if 0
/* GSPLAYïNô«âeâXâg */
int md;
md = APLPCL_SAVE_SCREEN
| APLPCL_RESET_CRTC
| APLPCL_SET_STARTPATH
| APLPCL_SET_PCP ;
AplDtaInit();
PCL_exec("I:/HC/SPLIB/PRG/GSPLAY/EXE/gsplay.exp",md);
#else
int ret, md;
char fn[256];
char *fdl;
unsigned att;
char *dlgTxm;
int colbox;
if ( (fdl = FDL_open()) == NULL )
return (-1);
FDL_setTitle(fdl,"CALL EXP TEST");
FDL_setAtt(fdl,FDLATT_SINGLE);
FDL_setWild(fdl,"*.exp");
FDL_setFn(fdl,"");
ret = FDL_start(fdl);
if ( ret == NORMAL )
strcpy( fn, FDL_getFn(fdl));
FDL_close(fdl);
if ( ret < 0 )
return (0);
colbox = 0;
colbox = SCN_tile_newMixCol(colbox,0x00,C_HGREEN,C_WHITE);
dlgTxm = DlgTxm_open(colbox);
DlgTxm_setTitle(dlgTxm,Fnt16x16,"CALL EXP");
DlgTxm_putf( dlgTxm, Fnt16x16, 1, "%s", fn );
DlgTxm_setBtn( dlgTxm, Fnt16x16, 64, 20, 8+1, 14, 15, 8, '\r' , KA_EXEC , 1, "", 0, "EXEC");
DlgTxm_setBtn( dlgTxm, Fnt16x16, 64, 20, 8+1, 14, 15, 8, '\x1B', KA_CANCEL, 0, "", 0, "CANCEL");
DlgTxm_setSize(dlgTxm,320,40);
DlgTxm_setPosition(dlgTxm,DLGPOS_CENTER_OF_SCREEN);
ret = DlgTxm_start(dlgTxm);
DlgTxm_close(dlgTxm);
SCN_tile_free(colbox);
if ( ret == 1 )
{
md = APLPCL_SAVE_SCREEN
| APLPCL_RESET_CRTC
| APLPCL_SET_STARTPATH
| APLPCL_SET_PCP ;
AplDtaInit();
PCL_exec(fn,md);
}
#endif
return (0);
}
/*************************************************************************
* Åæî╔ë≡ôÇâeâXâg
*************************************************************************/
int lhaext_test()
{
char *lhalib;
char *fdl;
unsigned att;
int ret;
char fnArc[256], pathDst[256];
if ( (fdl = FDL_open()) == NULL )
return (-1);
FDL_setTitle(fdl,"LHZ FILE EXTRACT");
FDL_setAtt(fdl,FDLATT_SINGLE);
FDL_setWild(fdl,"*.lzh");
FDL_setFn(fdl,"");
ret = FDL_start(fdl);
if ( ret < 0 )
{
FDL_close(fdl);
return (0);
}
strcpy( fnArc, FDL_getFn(fdl));
FDL_setTitle(fdl,"EXTRACT DIRECTORY");
FDL_setAtt(fdl,FDLATT_SINGLE);
FDL_setWild(fdl,"*.*");
FDL_setFn(fdl,"");
ret = FDL_start(fdl);
if ( ret < 0 )
{
FDL_close(fdl);
return (0);
}
strcpy( pathDst, FDL_getDir(fdl));
printf("arc file %s\n", fnArc); fflush(stdout);
if ( (lhalib = LHA_openArc(fnArc)) != NULL )
{
printf("LHA_extractAll(dir:%s)\n", pathDst); fflush(stdout);
LHA_extractAll(lhalib,pathDst);
LHA_closeArc(lhalib);
}
return (0);
}
/*************************************************************************
* âCâôâXâgü[âïâeâXâg
*************************************************************************/
int install_install()
{
int ret, att, len, drv, item_setup;
char *softname, *srcdir, instdir[256], *instfile, *helpfn;
char *item_ttl, *item_prog, *item_para;
int item_att;
char *dlgTxm;
char tmp[256], tmp2[256];
int colbox;
softname = "INSTALL"; /* ì∞òiû╝ */
srcdir = ""; /* òíÄ╩î│âfâBâîâNâgâè */
/* ïNô«âvâìâOâëâÇ